home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / M-More Monthly Disks / (c)m9.d64 / dm inst.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  2KB  |  51 lines
  1. 10 POKE53280,15
  2. 20 POKE53281,15
  3. 30 GOSUB380:PRINT" TO USE 'DISK MASTER[144]', YOU FIRST FORMAT
  4. 40 [153]"   A BLANK DISK TO BECOME THE MASTER
  5. 50 PRINT"   DIRECTORY DISK.
  6. 60 [153]"   THEN COPY THE 'DISK MASTERSTOP' PROGRAM
  7. 70 PRINT"   ONTO THAT DISK. BE SURE TO CALL IT      DISK MASTER[144] OR IT WON'T
  8. 75 [153]"   WORK PROPERLY . (YOU'LL BE ABLE TO      LOAD ''D*'' IF IT'S THE
  9. 76 PRINT"   FIRST PRG THERE)
  10. 80 [153]"      IT IS  I M P O R T A N TSTOP THAT THE
  11. 90 PRINT"   MASTER DISK BE IN THE DRIVE WHEN YOU
  12. 100 [153]"   'RUN' THIS PROGRAM,
  13. 110 PRINT"   ESPECIALLY IF YOU ARE UPDATING.
  14. 120 [153]:[153]:[141]410:[141]380:[153]"   FROM THE MENU, SELECT THE 'UPDATESTOP'
  15. 130 PRINT"   FUNCTION.
  16. 140 [153]"'DISK MASTER' WILL READ THE DIRECTORIES
  17. 150 PRINT"   OF YOUR DISK(S) AND
  18. 160 [153]"   WRITE A CONDENSED VERSION ONTO
  19. 170 PRINT"   THE MASTER DISK.
  20. 180 [153]"   IT ALSO MAINTAINS A CROSS REFERENCE
  21. 190 PRINT"   FILE CONSISTING OF NAMES AND ID'S.
  22. 200 [153]:[153]:[141]410:[141]380
  23. 210 [153]"   SELECTING 'NAMES ,ID'SSTOP' WILL SHOW
  24. 220 PRINT"   YOU WHAT THERE IS IN THE CROSS          REFERENCE FILE
  25. 230 [153]"   'SELECTED DIRECTORYSTOP' WILL SHOW YOU      JUST THAT.
  26. 240 PRINT"   FINDING A SPECIFIED FILE[144] WILL DO        SO... FAST![144]
  27. 250 [153]"   YOU JUST ENTER THE FIRST LETTERS        OF THE FILENAME YOU'RE
  28. 260 PRINT"   LOOKING FOR AND 'DISK MASTER' WILL      FIND[144] THE NAME & DISK.
  29. 270 [153]:[153]:[141]410:[141]380
  30. 280 [153]"   SELECTING 'DELETESTOP' WILL DO JUST         THAT... THIS SHOULD BE THE
  31. 290 PRINT"   ONLY WAY YOU DELETE ENTRIES FROM        THE MASTER DISK
  32. 300 [153]"MINSTOP  WILL SHOW HOW MANY BLOCKS FREE        THERE ARE ON EACH DISK
  33. 310 PRINT"MAX[144] THE SAME, BUT MAX
  34. 320 [153]"   'QUICK LISTSTOP' QUICKLY LISTS ALL THE      ID'S YOU'VE BEEN USING...
  35. 330 PRINT"   THE 'CHART[144]' DOES THE SAME,BUT MORE      GRAPHICALLY & SLOWLY
  36. 340 [153]"   USE THE COMMODORE PRINTER; I DON'T      KNOW ABOUT THE OTHERS
  37. 350 PRINT:GOSUB410:GOSUB380
  38. 360 PRINT:PRINT:PRINT"WHEN IN DOUBT, HIT 'RETURN'.
  39. 365 [153]:[153]:[153]"ENJOY...
  40. 369 GOSUB410
  41. 370 PRINT"[147]LOAD"CHR$(34)"DISK MASTER"CHR$(34)",8":PRINT"RUN";
  42. 372 POKE631,13:POKE632,13:POKE198,2:END
  43. 380 PRINT"[147] [154][213][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][201][146][144]"
  44. 390 PRINT" [154][221]     DISK  MASTER * INSTRUCTIONS    [154][221][146][144]"
  45. 400 PRINT" [154][202][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][203][146][144]":PRINT:PRINT:RETURN
  46. 410 PRINT"        [213][195][195][195][195][195][195][195][195][195][201]                    "
  47. 420 PRINT"        [182][146] RETURN [223]TO CONTINUE...        [146]"
  48. 430 PRINT"[145]        [202][195][195][195][195][195][195][195][195][195][203]                 [144]"
  49. 440 GETC$:IFC$<>CHR$(13)THEN440
  50. 450 RETURN
  51.